object dlgAddApplication: TdlgAddApplication Left = 187 Top = 206 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Add Allowed Application' ClientHeight = 217 ClientWidth = 368 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 26 Top = 17 Width = 212 Height = 13 Caption = '&Enter name of application (e.g. notepad.exe):' FocusControl = comboApplication Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object OKBtn: TBitBtn Left = 264 Top = 47 Width = 85 Height = 27 Caption = '&OK' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = OKBtnClick Kind = bkOK Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 264 Top = 79 Width = 85 Height = 27 Caption = '&Cancel' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 Kind = bkCancel Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 264 Top = 143 Width = 85 Height = 27 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 Kind = bkHelp Spacing = -1 IsControl = True end object comboApplication: TComboBox Left = 26 Top = 45 Width = 215 Height = 132 Style = csSimple Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'calc.exe' 'excel.exe' 'explorer.exe' 'mspaint.exe' 'notepad.exe' 'pbrush.exe' 'sol.exe' 'winword.exe' 'wpwin.exe') ParentFont = False Sorted = True TabOrder = 0 end object cmdBrowseApp: TBitBtn Left = 264 Top = 111 Width = 85 Height = 27 Caption = '&Browse' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = cmdBrowseAppClick Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777770077007700777777007700770 0777777007700770077777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777} Spacing = -1 end object chkCreateShortcut: TCheckBox Left = 26 Top = 189 Width = 301 Height = 17 Caption = 'Create &Shortcut to application in user'#39's Program Folder' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 5 end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit Left = 304 Top = 16 end end